home *** CD-ROM | disk | FTP | other *** search
- .bra {
- .ket }
-
-
- ; UUArc installation script by J.G.Brandon
-
-
- ; Display installation procedure, and check that this is acceptable
- ; to the user, abort if not
-
- Echo " "
- Echo " UUARC BY J.G.BRANDON"
- Echo " "
- Echo " "
- Echo " Installation script"
- Echo " -------------------"
- Echo " "
- Echo " This script attempts to install the UUArc program into your C:"
- Echo " directory, and (if present) adds a UUArc entry to the ArcTypes"
- Echo " file for GuiArc, if you have it."
- Echo " "
- Echo " "
-
- Ask " Continue with installation (Enter Y/N) ?"
- If NOT WARN
- Echo " "
- Echo " "
- Echo " Okay - aborting installation."
- Echo " "
- EndCLI >NIL:
- EndIf
-
-
- ; Attempt to install the UUArc executable into C:
- ; If a version already exists there, check with the
- ; user before copying this version across
-
- Echo "*ec"
- Echo " Attemping to install UUArc into C:."
- Echo " "
- If EXISTS C:UUArc
- Echo " "
- Echo " UUArc already installed in C:.*n"
- Ask " Continue to add this version (Enter Y/N) ?"
- If NOT WARN
- Echo " "
- Echo " "
- Echo " Okay - executable not copied."
- Echo " "
- Wait 3 Secs
- Skip NoAddUUArc
- EndIf
- EndIf
-
- Echo " "
- Echo " "
- Echo " Copying UUArc into C: ..."
- Copy UUArc C:
- Echo " ... done."
- Echo " "
- Wait 5 Secs
-
-
- ; Attempt to add a suitable entry to the GuiArc
- ; 'arctypes' file if it exists in SYS:Utilities.
- ; Skip if there is already an entry.
-
- Lab NoAddUUArc
-
- Echo "*ec"
- Echo " Attemping to add ArcTypes entry for GuiArc."
- Echo " "
- If NOT EXISTS SYS:Utilities/ArcTypes
- Echo " "
- Echo " Could not find Gui ArcTypes files in SYS:Utilities."
- Echo " "
- Echo " If you have GuiArc please add the UUArcType file in"
- Echo " this directory onto the end of your ArcTypes file."
- Echo " "
- Skip InstallFinished
- EndCLI >NIL:
- EndIf
-
-
- SetEnv searchresult NOTFOUND
- Search >>ENV:searchresult SYS:Utilities/ArcTypes @UUE Quiet
- If $searchresult GT NOTFOUND
- Echo " "
- Echo " An entry for UUE archiving is already present."
- Echo " "
- Echo " If this is an entry produced by an earlier version"
- Echo " of UUArc please use a text editor such as ED to"
- Echo " remove the old entry from SYS:Utilities/ArcTypes"
- Echo " (the 13 lines starting from the line containing"
- Echo " @UUE) then re-try this installation script."
- Echo " "
- Skip InstallFinished
- EndIf
-
- Echo " "
- Echo " Adding a UUArc entry to ArcTypes..."
- Type >>SYS:Utilities/ArcTypes UUArcType
- Echo " .... done."
- Echo " "
-
-
- Lab InstallFinished
-
- Echo " "
- Echo " Installation complete."
- Echo " "
- Wait 10 Secs
- EndCLI >NIL:
-